home *** CD-ROM | disk | FTP | other *** search
/ Internet.Works 40 / Issue 40.iso / pc / Main / 00018_GotoSubscribe.ls < prev    next >
Encoding:
Text File  |  2000-11-09  |  188 b   |  14 lines
  1. on mouseWithin
  2.   cursor(280)
  3.   member("TitleSubscribe").foreColor = 70
  4. end
  5.  
  6. on mouseLeave
  7.   cursor(0)
  8.   member("TitleSubscribe").foreColor = 255
  9. end
  10.  
  11. on mouseDown
  12.   go(1, "Subscribe")
  13. end
  14.